home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d13 / pcrjan89.arc / GETDAY.SCR < prev    next >
Text File  |  1990-03-21  |  418b  |  12 lines
  1. N GETDAY.COM       ;Name program
  2. A 100              ;Start assembly        
  3. MOV     AH,2A      ;DOS function: get date
  4. INT     21         ;Call DOS (returns day of week in AL)
  5. MOV     AH,4C      ;DOS function: terminate with return code
  6. INT     21         ;Call DOS (with return code in AL)
  7.  
  8. RCX                ;Set CX to write 8-byte file
  9. 8
  10. W                  ;Write file to disk
  11. Q                  ;Quit DEBUG
  12.